home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Toolbox / Visual Basic Toolbox (P.I.E.)(1996).ISO / printing / ddrvprev / ddrvcnst.bas < prev    next >
Encoding:
BASIC Source File  |  1995-12-09  |  3.8 KB  |  98 lines
  1. Option Explicit
  2.  
  3. ' --------------------------------
  4. ' -- DDRV.DLL Function Delarations
  5. ' --------------------------------
  6.  
  7.     ' -- Viewer Control Functions
  8.     Declare Function rvInit% Lib "ddrv.dll" (ByVal hParent%, ByVal Title$, ByVal JustShow%, ByVal UnitOfMeasure%, ByVal PortOrland%)
  9.     Declare Sub rvNewPage Lib "ddrv.dll" ()
  10.     Declare Sub rvEndDoc Lib "ddrv.dll" ()
  11.     Declare Sub rvViewerPos Lib "ddrv.dll" (ByVal x%, ByVal y%, ByVal h%, ByVal w%, ByVal ShowControl%)
  12.     Declare Sub rvButtonCaption Lib "ddrv.dll" (ByVal Which%, ByVal TheCaption$)
  13.     Declare Sub rvButtons Lib "ddrv.dll" (ByVal x%, ByVal y%, ByVal GraphicFile$)
  14.     Declare Function rvGetHandle Lib "ddrv.dll" () As Integer
  15.     Declare Function rvViewerActive Lib "ddrv.dll" (ByVal hWnd%) As Integer
  16.     Declare Sub rvFloatViewer Lib "ddrv.dll" (ByVal hWnd%, ByVal YesOrNo%)
  17.     Declare Sub rvKillViewer Lib "ddrv.dll" (ByVal hWnd%)
  18.     Declare Function rvGetCloseHandle Lib "ddrv.dll" () As Integer
  19.     
  20.     ' -- Drawing Functions
  21.     Declare Sub rvText Lib "ddrv.dll" (ByVal x!, ByVal y!, ByVal align%, ByVal TheText$)
  22.     Declare Sub rvParagraph Lib "ddrv.dll" (ByVal x1!, ByVal y1!, ByVal x2!, ByVal y2!, ByVal TheString$)
  23.     Declare Sub rvAngleText Lib "ddrv.dll" (ByVal x!, ByVal y!, ByVal angle%, ByVal TheText$)
  24.     Declare Sub rvLine Lib "ddrv.dll" (ByVal x1!, ByVal y1!, ByVal x2!, ByVal y2!, ByVal p!)
  25.     Declare Sub rvRect Lib "ddrv.dll" (ByVal x1!, ByVal y1!, ByVal x2!, ByVal y2!, ByVal p!, ByVal s%)
  26.     Declare Sub rvGraphic Lib "ddrv.dll" (ByVal FileName$, ByVal x1!, ByVal y1!, ByVal x2!, ByVal y2!)
  27.     
  28.     ' -- Font Functions
  29.     Declare Sub rvFontName Lib "ddrv.dll" (ByVal FontName$)
  30.     Declare Sub rvFontSize Lib "ddrv.dll" (ByVal FontSize%)
  31.     Declare Sub rvFontStyle Lib "ddrv.dll" (ByVal FontStyle%)
  32.  
  33.     ' -- Support Function
  34.     Declare Sub rvGetEditBoxLine Lib "ddrv.dll" (ByVal hWnd%, Which&, ByVal TheBuffer$)
  35.     Declare Function rvWhatIsTempFile Lib "ddrv.dll" (ByVal FileName$) As Integer
  36.  
  37. ' ---------------------------------
  38. ' -- DDRV.DLL Constant Declarations
  39. ' ---------------------------------
  40.  
  41.     ' -- Font Style Constants (Bitwise)
  42.     Global Const RV_FONTNORMAL = 0
  43.     Global Const RV_FONTBOLD = 1
  44.     Global Const RV_FONTITALIC = 2
  45.     Global Const RV_FONTUNDERLINE = 4
  46.     Global Const RV_FONTSTRIKEOUT = 8
  47.     
  48.     ' -- Text alignment constants
  49.     Global Const RV_LEFT = 0
  50.     Global Const RV_CENTER = 1
  51.     Global Const RV_RIGHT = 2
  52.     Global Const RV_DECIMAL = 3
  53.     
  54.     ' -- Rectangle background constants
  55.     Global Const RV_CLEARBACK = 0
  56.     Global Const RV_GREYBACK = 2
  57.  
  58.     ' -- Units of measure
  59.     Global Const RV_INCH = 0
  60.     Global Const RV_CM = 1
  61.     
  62.     ' -- Page control
  63.     Global Const RV_JUSTPRINT = 0
  64.     Global Const RV_VIEWFIRST = 1
  65.     Global Const RV_CREATETEMP = 2
  66.  
  67.     ' -- Options (bitwise)
  68.     '    these go in the Options parameter of rvInit
  69.     Global Const RV_PORTRAIT = 0
  70.     Global Const RV_LANDSCAPE = 1
  71.     Global Const RV_MAGNIFY = 2
  72.     Global Const RV_PRINTSELECT = 4
  73.     Global Const RV_ZOOM100 = 0
  74.     Global Const RV_ZOOM75 = 8
  75.     Global Const RV_ZOOM50 = 16
  76.     Global Const RV_ZOOMFIT = 32
  77.     Global Const RV_HIDEDEFPRINTER = 64
  78.     Global Const RV_SAVETEMPFILE = 128
  79.  
  80.     ' -- Screen control
  81.     '    one of these constants can go in the X parameter
  82.     '    of the rvViewPos function if you want the viewer
  83.     '    to initalize maximized or minimized.
  84.     Global Const RV_MAXIMIZE = -1
  85.     Global Const RV_MINIMIZE = -2
  86.  
  87.     Global Const RV_CTLBOX = 1
  88.     Global Const RV_NOCTLBOX = 0
  89.  
  90.     ' -- Button codes to Assign hints (captions) to buttons
  91.     Global Const RV_BTN_EXIT = 0
  92.     Global Const RV_BTN_PREV = 1
  93.     Global Const RV_BTN_NEXT = 2
  94.     Global Const RV_BTN_PRINT = 3
  95.     Global Const RV_BTN_CHOOSEPRINT = 4
  96.     Global Const RV_CBO_ZOOM = 5
  97.  
  98.